PC Professionell 2006 May/PCpro_2006_05.ISO/files/mobile/fma-2.0-stable-setup.exe/{app}/source/uExploreView.dfm

Text File | 2004-06-30 | 4.3 KB | 162 lines

object frmExplore: TfrmExplore
  Left = 0
  Top = 0
  Width = 634
  Height = 369
  TabOrder = 0
  Visible = False
  DesignSize = (
    634
    369)
  object ListItems: TVirtualStringTree
    Left = 0
    Top = 0
    Width = 634
    Height = 369
    Align = alClient
    DefaultNodeHeight = 17
    DragMode = dmAutomatic
    Header.AutoSizeIndex = -1
    Header.Font.Charset = ANSI_CHARSET
    Header.Font.Color = clWindowText
    Header.Font.Height = -11
    Header.Font.Name = 'Arial Unicode MS'
    Header.Font.Style = []
    Header.Height = 20
    Header.Options = [hoAutoResize, hoColumnResize, hoDrag, hoHotTrack, hoShowImages, hoShowSortGlyphs, hoVisible]
    Header.Style = hsFlatButtons
    HintAnimation = hatNone
    HintMode = hmTooltip
    Images = Form1.ImageList1
    Indent = 0
    LineMode = lmBands
    PopupMenu = PopupMenu1
    ScrollBarOptions.AlwaysVisible = True
    TabOrder = 0
    TreeOptions.AutoOptions = [toAutoDropExpand, toAutoScrollOnExpand, toAutoSpanColumns, toAutoTristateTracking, toAutoDeleteMovedNodes]
    TreeOptions.MiscOptions = [toAcceptOLEDrop, toFullRepaintOnResize, toInitOnSave, toReportMode, toToggleOnDblClick, toWheelPanning]
    TreeOptions.PaintOptions = [toHideFocusRect, toShowButtons, toShowDropmark, toShowHorzGridLines, toShowRoot, toShowTreeLines, toThemeAware, toUseBlendedImages]
    TreeOptions.SelectionOptions = [toFullRowSelect, toRightClickSelect]
    OnDblClick = Properties1Click
    OnGetText = ListItemsGetText
    OnGetImageIndex = ListItemsGetImageIndex
    Columns = <
      item
        MinWidth = 70
        Position = 0
        Width = 300
        WideText = 'Name'
      end
      item
        MinWidth = 70
        Position = 1
        Width = 120
        WideText = 'Type / When'
      end
      item
        Alignment = taRightJustify
        MinWidth = 70
        Position = 2
        Width = 193
        WideText = 'Size / Position'
      end>
  end
  object NoItemsPanel: TPanel
    Left = 8
    Top = 24
    Width = 601
    Height = 21
    Anchors = [akLeft, akTop, akRight]
    BevelOuter = bvNone
    Caption = 'There are no items to display in this view.'
    Color = clWindow
    TabOrder = 1
  end
  object PopupMenu1: TPopupMenu
    Images = Form1.ImageList2
    OnPopup = PopupMenu1Popup
    Left = 56
    Top = 80
    object Explore1: TMenuItem
      Caption = '&Explore'
      OnClick = Open1Click
    end
    object ActivatePr1: TMenuItem
      Caption = 'Activate Profile'
    end
    object N7: TMenuItem
      Caption = '-'
    end
    object New1: TMenuItem
      Caption = 'New'
      object sms1: TMenuItem
        Action = Form1.ActionSMSNewMsg
      end
      object person1: TMenuItem
        Action = Form1.ActionContactsNewPerson
      end
      object Note1: TMenuItem
        Action = Form1.ActionToolsPostNote
      end
      object Bookmark1: TMenuItem
        Action = Form1.ActionToolsPostBookmark
      end
      object NewGroup1: TMenuItem
        Action = Form1.ActionToolsCreateGroup
      end
    end
    object SendandReceive1: TMenuItem
      Caption = 'Send and Receive'
      object Upload1: TMenuItem
        Action = Form1.ActionToolsUpload
      end
      object download1: TMenuItem
        Action = Form1.ActionToolsDownload
      end
    end
    object N4: TMenuItem
      Caption = '-'
    end
    object newmsg1: TMenuItem
      Action = Form1.ActionContactsNewMsg
    end
    object newcall1: TMenuItem
      Action = Form1.ActionContactsVoiceCall
    end
    object ChatContact1: TMenuItem
      Action = Form1.ActionContactsNewChat
    end
    object N1: TMenuItem
      Caption = '-'
    end
    object AddToPhonebook1: TMenuItem
      Action = Form1.ActionContactsAddContact
    end
    object N3: TMenuItem
      Caption = '-'
    end
    object Delete1: TMenuItem
      Action = Form1.ActionDelete
    end
    object N5: TMenuItem
      Caption = '-'
    end
    object Properties1: TMenuItem
      Caption = '&Properties'
      ImageIndex = 10
      OnClick = Properties1Click
    end
  end
  object FormStorage1: TFormStorage
    IniFileName = 'Software\floAt'
    IniSection = 'MobileAgent'
    Options = []
    UseRegistry = True
    StoredProps.Strings = (
      'ListItems.Header')
    StoredValues = <>
    Left = 24
    Top = 80
  end
end